#pragma once

#include <iostream>
#include <string>
#include <functional>
#include <sys/time.h>
#include <sys/types.h>
#include <unistd.h>
#include "sock.hpp"

namespace select_ns
{
    static const int defaultport = 8080;
    static const int fdnum = sizeof(fd_set) * 8;
    static const int defaultfd = -1;

    using func_t = std::function<std::string(const std::string&)>;

    class SelectServer
    {
    public:
        SelectServer(func_t func,int port = defaultport) :_func(func), _port(port), _listensock(-1), _fdarrary(nullptr)
        {
        }
        void Print()
        {
            std::cout << "fd list: ";
            for (int i = 0; i < fdnum; ++i)
            {
                if (_fdarrary[i] != defaultfd)
                    std::cout << _fdarrary[i] << " ";
            }

            std::cout << std::endl;
        }
        void Accepter(int listensock)
        {
            // 走到这里，accept，不会被阻塞
            // select 告诉我，listensock读事件就绪了
            std::string clientip;
            uint16_t clientport = 0;
            int sock = Sock::Accept(_listensock, &clientip, &clientport); // accept = 等 + 获取
            if (sock < 0)
                return;
            // 开始进行服务器的处理逻辑
            logMessage(NOMAL, "accept success [%s:%d]", clientip.c_str(), clientport);

            // TODO,sock能直接recv/read吗？不能，整个代码，只有select有资格检测事件是否就绪
            // 将新的sock，托管给select！
            // 将新的sock，托管给select的本质，其实就是将sock，添加到_fdarrary数组中即可！
            int i = 0;
            for (; i < fdnum; i++)
            {
                if (_fdarrary[i] != defaultfd)
                    continue;
                else
                    break;
            }
            if (i == fdnum)
            {
                logMessage(WARING, "server is full,please wait");
                close(sock); // 服务器满了，直接关闭它
            }
            else
            {
                _fdarrary[i] = sock;
            }
        }
        void Recver(int sock, int pos)
        {
            // 这样读取是有问题的！数据读完了吗？？
            char buffer[1024];
            ssize_t s = recv(sock, buffer, sizeof(buffer) - 1, 0); // 这里在进行读取的时候，不会被阻塞。
            if (s > 0)
            {
                buffer[s] = 0;
                logMessage(NOMAL, "client: %s", buffer);
            }
            else if (s == 0)
            {
                close(sock);
                _fdarrary[pos] = defaultfd;
                logMessage(NOMAL, "client quit");
            }
            else
            {
                close(sock);
                _fdarrary[pos] = defaultfd;
                logMessage(ERROR, "client quit: %s",strerror(errno));
            }

            // 2.处理request
            std::string response = _func(buffer);

            // 3.返回response
            // write bug
            write(sock,response.c_str(),response.size());
        }
        // 1.handler even中，不仅仅是有一个fd是就绪的，可能存在多个
        // 2.我们的select目前只处理了read事件
        void HandlerReadEvent(fd_set &rfds)
        {
            for (int i = 0; i < fdnum; ++i)
            {
                // 过滤掉非法的fd
                if (_fdarrary[i] == defaultfd)
                    continue;

                // 正常的fd
                // 正常的fd不一定就绪了
                // ? 目前一定式listensock，只有一个
                if (FD_ISSET(_fdarrary[i], &rfds) && _fdarrary[i] == _listensock)
                    Accepter(_listensock);
                else if(FD_ISSET(_fdarrary[i], &rfds))
                    Recver(_fdarrary[i],i); // 处理正常的读取事件
                else{}
            }
        }
        void initServer()
        {
            _listensock = Sock::Socket();
            Sock::Bind(_listensock, _port);
            Sock::Listen(_listensock);

            _fdarrary = new int[fdnum];
            for (int i = 0; i < fdnum; ++i)
                _fdarrary[i] = defaultfd;
            _fdarrary[0] = _listensock; // 不变了
        }
        void start()
        {
            for (;;)
            {
                fd_set rfds; // readfdsize
                fd_set wfds;
                FD_ZERO(&rfds);
                int maxfd = _fdarrary[0];

                for (int i = 0; i < fdnum; ++i)
                {
                    if (_fdarrary[i] == defaultfd)
                        continue;
                    FD_SET(_fdarrary[i], &rfds); // 合法 fd 全部添加到读文件描述符中

                    if (maxfd < _fdarrary[i])
                        maxfd = _fdarrary[i]; // 更新所有所有fd中最大的fd
                }
                FD_SET(_listensock, &rfds); // listensock 添加到读文件描述符中
                struct timeval timeout = {1, 0};
                logMessage(NOMAL, "maxfd is :%d", maxfd);

                // int n = select(_listensock + 1,&rfds,nullptr,nullptr,&timeout);
                // 一般而言，要是用select，需要程序员自己维护好一个保持所有合法fd的数组！
                int n = select(maxfd + 1, &rfds, nullptr, nullptr, nullptr);
                switch (n)
                {
                case 0:
                    logMessage(NOMAL, "timeout...");
                    break;
                case -1:
                    logMessage(WARING, "select error,code: %d,err string: %s", errno, strerror(errno));
                    break;
                default:
                    // 说明有时间就绪了，目前只有一个监听事件
                    logMessage(NOMAL, "have event read!");
                    HandlerReadEvent(rfds);
                    break;
                }
                Print();
            }
        }
        ~SelectServer()
        {
            if (_listensock < 0)
                close(_listensock);
            if (_fdarrary)
                delete[] _fdarrary;
        }

    private:
        int _port;
        int _listensock;
        int *_fdarrary;
        func_t _func;
    };
}